90 SYS0006070 100 PRINT"[147]";CHR$(14):POKE53280,0:POKE53281,0 110 PRINT" [211]OFTWARE BY [215]ILSERV":PRINT 120 PRINT" [158][205][211]/[196][207][211] [193]RCHIVE [198]ILE [196]ISSOLVER" 130 PRINT" [214]ERSION 2.00" 140 PRINT 150 PRINT" [195]OPYRIGHT (C) 1987 BY [215]ILLI [203]USCHE" 160 PRINT:PRINT"[156] [203][205][205][205] [208]ASCAL [194][194][211] (609) 232-0773":PRINT 170 PRINT"[212]HIS PROGRAM IS THE COPYRIGHTED PROPERTY"; 180 PRINT"OF THE AUTHOR -- IT IS [206][207][212] IN THE PUBLIC"; 190 PRINT"DOMAIN. [200][207][215][197][214][197][210]... FREE USE AND DISTRI-"; 200 PRINT"BUTION IS ENCOURAGED, SUBJECT TO THE" 210 PRINT"FOLLOWING CONDITIONS:" 220 PRINT 230 PRINT"(1) [212]HIS PROGRAM MAY NOT BE UPLOADED TO"; 240 PRINT" ANY [194][194][211] OR SERVICE THAT CHARGES" 250 PRINT" A FEE FOR DOWNLOADING FILES." 260 PRINT"(2) [212]HIS PROGRAM MAY NOT BE A PART OF" 270 PRINT" A DISKETTE WHEN A FEE IS CHARGED" 275 PRINT" FOR COPYING THAT DISKETTE." 276 PRINT:PRINT 280 PRINT" [159][208]RESS ANY KEY TO CONTINUE"; 310 GETC$:IFC$=""THENGOTO310 330 PRINT"[147]" 340 PRINT" [212]HIS PROGRAM WILL EXTRACT THE FILES" 350 PRINT"THAT ARE PART OF AN [205][211]/[196][207][211] '.[193][210][195]' FILE." 360 PRINT 370 PRINT" [212]HIS PROGRAM ASSUMES THAT THE ARCHIVE" 380 PRINT"FILE NAME HAS A '.[193][210][195]' SUFFIX, SO DO" 390 PRINT"NOT ENTER IT WHEN YOU GIVE THE FILE" 400 PRINT"NAME.":PRINT 410 PRINT" [212]HE OUTPUT DRIVE IS SPECIFIED AS" 420 PRINT"FOLLOWS:":PRINT 430 PRINT" [204]ETTER [213]NIT [196]RIVE [206]O." 440 PRINT" ------ ---- ---------" 450 PRINT" [193] 8 0" 460 PRINT" [194] 8 1" 470 PRINT" [195] 9 0" 480 PRINT" [196] 9 1" 490 PRINT" [197] 10 0" 500 PRINT" [198] 10 1":PRINT:PRINT:PRINT:PRINT 510 PRINT" [159][208]RESS ANY KEY TO CONTINUE"; 520 GETC$:IFC$=""THENGOTO520 530 PRINTCHR$(142);"[147]" 540 SYS3596 550 SYS0006097